home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / byteibm.arc / HOGAN.ARC / LISTING6.TXT < prev   
Encoding:
Text File  |  1985-07-12  |  512 b   |  10 lines
  1.         MOV   CX, 128        ; SEARCH 128 BYTES
  2.         MOV   AL, VALUE      ; VALUE TO BE FOUND
  3.         MOV   AH, AL         ; SAME VALUE IN AH
  4.         MOV   DI, OFFSET     ; START OF MEMORY TO SEARCH
  5.         DEC   DI
  6.  TOP:
  7.         INC   DI             ;  2 clocks
  8.         MOV   AL, AH         ;  2 clocks
  9.         SUB   AL, [DI]       ; 14 clocks
  10.         LOOPNZ TOP           ; 19 clocks